home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Utilities / Programming / Dialog Director 0.6 / Examples / Sys Folder.as < prev    next >
Encoding:
Text File  |  1997-04-17  |  273 b   |  5 lines  |  [TEXT/ToyS]
  1. set lbItems to list folder (path to system folder) without invisibles
  2. set dItems to [{class:list box, bounds:[10, 10, 210, 172], contents:lbItems}, ¬
  3.     {class:push button, bounds:[150, 190, 210, 210], name:"OK", enabled:1}]
  4.  
  5. dd auto dialog {size:[220, 220], contents:dItems}